home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
basic
/
dialogic.zip
/
DIALOG3.DB
< prev
next >
Wrap
Text File
|
1990-01-31
|
3KB
|
78 lines
DB(Level%, 1).Code = 1
DB(Level%, 1).Y = 0
DB(Level%, 1).X = 0
DB(Level%, 1).Height = 19
DB(Level%, 1).Wdth = 65
DB(Level%, 1).BorderType = -1
DB(Level%, 1).PrimaryColor = -c1
DB(Level%, 1).WindowColor = -c1
DB(Level%, 1).Text = "Text Boxes"
DB(Level%, 1).TextColor = c2
DB(Level%, 1).SecondaryColor = c1
LB(1).Text = "The text box is shown below. It is operates EXACTLY like"
LB(2).Text = "Microsoft's. It is the dialog box element which gathers"
LB(3).Text = "free-form text data from the user. It supports full"
LB(4).Text = "editing. There is an insert/overtype toggle with the"
LB(5).Text = "<Ins>ert key. <Del>ete, <Backspace>, <Home>, <End>,"
LB(6).Text = "<Ctrl><PgUp>, <Ctrl><PgDn>, and left/right arrow keys"
LB(7).Text = "are fully-functional. Text may be selected using the"
LB(8).Text = "<Shift> key in combination with the directional keys."
LB(9).Text = "Also, a text box may accept more characters than its "
LB(10).Text = "width since characters are scrolled when needed."
LB(11).Text = " "
LB(12).Text = "Please take some time to experiment with the text box."
LB(13).Text = "the words " + CHR$(34) + "Dialog Software" + CHR$(34) + " have been placed in it to"
LB(14).Text = "demonstrate that a default edit string may be present. "
DB(Level%, 2).Code = 3
DB(Level%, 2).Y = 2
DB(Level%, 2).X = 2
DB(Level%, 2).Height = 10
DB(Level%, 2).Wdth = 1
DB(Level%, 2).WindowColor = c1
DB(Level%, 2).PrimaryColor = c1
DB(Level%, 2).SecondaryColor = c2
DB(Level%, 2).SelectedColor = -1
DB(Level%, 2).StarColor = c1
DB(Level%, 2).ItemLength = 60
DB(Level%, 2).KeyColor = 0
DB(Level%, 2).BorderType = 2
DB(Level%, 2).Link = 0
DB(Level%, 2).TextY = 0
DB(Level%, 2).TextX = 0
DB(Level%, 2).TextColor = c1
DB(Level%, 2).NumberOne = 1
DB(Level%, 2).NumberTwo = 13
DB(Level%, 2).Default = 0
DB(Level%, 3).Code = 2
DB(Level%, 3).Y = 14
DB(Level%, 3).X = 13
DB(Level%, 3).Wdth = 50
DB(Level%, 3).BorderType = 1
DB(Level%, 3).PrimaryColor = c1
DB(Level%, 3).WindowColor = c1
DB(Level%, 3).SelectedColor = c3
DB(Level%, 3).TextY = 15
DB(Level%, 3).TextX = 3
DB(Level%, 3).Text = "~Text Box:"
DB(Level%, 3).TextColor = c1
DB(Level%, 3).KeyColor = c4
DB(Level%, 3).TextString = "Dialog Software"
DB(Level%, 3).ItemLength = 100
DB(Level%, 4).Code = 7
DB(Level%, 4).Y = 18
DB(Level%, 4).X = 30
DB(Level%, 4).Text = "~OK"
DB(Level%, 4).PrimaryColor = c1
DB(Level%, 4).WindowColor = c1
DB(Level%, 4).SelectedColor = c3
DB(Level%, 4).KeyColor = c4
DB(Level%, 4).SecondaryColor = c4
DB(Level%, 4).TextString = CHR$(13)
DB(Level%, 5).Code = 0